Speedway 3 by Panic
**** COMMODORE 64 BASIC V2 **** 64K RAM SYSTEM 38911 BASIC BYTES FREE READY. -
**** COMMODORE 64 BASIC V2 **** 64K RAM SYSTEM 38911 BASIC BYTES FREE READY. -
1 INPUT"ENTER PART # ";PART$ 2 A=12*4096+2*32+116 3 POKE A,ASC(MID$(PART$,1,1)) 4 POKE A+1,ASC(MID$(PART$,2,1)) 5 PRINT "PART - # " ; CHR$(PEEK(A));CHR$(PEEK(A+1)) 6 SYS 9*4096+15*256 READY. LIST 0 PRINT"DEMO PART JUMPER 0.0.1" 1 INPUT"ENTER PART # ";PART$ 2 A=12*4096+2*16+10 3 POKE A,ASC(MID$(PART$,1,1)) 4 POKE A+1,ASC(MID$(PART$,2,1)) 5 PRINT "PART - # " ; CHR$(PEEK(A));CHR$(PEEK(A+1)) 6 SYS 9*4096+15*256 READY. RUN DEMO PART JUMPER 0.0.1 ENTER PART # ? - //INSTALLED IN 1999/ -
1 INPUT"ENTER PART # ";PART$ 2 A=12*4096+2*32+116 3 POKE A,ASC(MID$(PART$,1,1)) 4 POKE A+1,ASC(MID$(PART$,2,1)) 5 PRINT "PART - # " ; CHR$(PEEK(A));CHR$(PEEK(A+1)) 6 SYS 9*4096+15*256 READY. LIST 0 PRINT"DEMO PART JUMPER 0.0.1" 1 INPUT"ENTER PART # ";PART$ 2 A=12*4096+2*16+10 3 POKE A,ASC(MID$(PART$,1,1)) 4 POKE A+1,ASC(MID$(PART$,2,1)) 5 PRINT "PART - # " ; CHR$(PEEK(A));CHR$(PEEK(A+1)) 6 SYS 9*4096+15*256 READY. RUN DEMO PART JUMPER 0.0.1 ENTER PART # ? - - //INSTALLED IN 1999/ -
LORELEI BY DEBRIS/PANIC - - ABCEFGHJKLMOPQRTUVWYZ[/^_ ! -
1 REM 10 REM ------------------------- 20 REM LORELEI BY DEBRIS 21 REM ------------------------- 22 REM 23 REM ASSEMBLY'99 GFX COMPO 2ND PLACE.24 REM 25 REM DUE TO LACK OF TICKETS - THEY 26 REM WERE SOLD OUT, THIS COMPOPIC 27 REM ENTRIED THE COMPO TITLED AS 28 REM KUVA BY DEETSAY/PANIC, B'COS 29 REM HE WAS THE ONLY ONE WITH THE 30 REM TICKET FROM OUR GROUP. 31 REM 32 REM THE PIC IS 100% PIXELED. 33 REM I CAN SHOW THE EARLIER VERSIONS 34 REM IF SOMEONE DOESN'T BELIEVE. 35 REM 36 REM /DEBRIS 37 REM E-MAIL:DEBRIS - FREENET.HUT.FI 38 REM HTTP://WWW.COME.TO/PANIC64 39 REM READY. - -